home *** CD-ROM | disk | FTP | other *** search
/ BCI NET 2 / BCI NET 2.iso / archives / utilities / cdrom / checkdev.lha / CheckDev / S / startup-sequence.CD < prev    next >
Encoding:
Text File  |  1995-01-28  |  1.7 KB  |  89 lines
  1.    cd0:
  2.    noclick CLICKOFF >NIL:
  3.  
  4.    resident c:assign
  5.    resident c:execute
  6.    failat 100
  7.    Makedir Ram:T
  8.  
  9.    Assign T: Ram:T
  10.    assign >NIL: OLDSYS: SYS:
  11.  
  12.   IF EXISTS CD0:Locale
  13.     Assign >NIL: LOCALE:         CD0:Locale
  14.   EndIF
  15.  
  16.   IF EXISTS CD0:Devs/Keymaps
  17.     Assign >NIL: KEYMAPS:        CD0:Devs/Keymaps
  18.   EndIF
  19.  
  20.   IF EXISTS CD0:Devs/Printers
  21.     Assign >NIL: PRINTERS:       CD0:Devs/Printers
  22.   EndIF
  23.  
  24.   IF EXISTS CD0:Rexx
  25.     Assign >NIL: REXX:           CD0:Rexx
  26.   EndIF
  27.  
  28.   IF EXISTS CD0:Clipboards
  29.     Assign >NIL: CLIPS:          CD0:Clipboards
  30.   EndIF
  31.  
  32.   IF EXISTS CD0:ENV
  33.     Assign >NIL: ENV:            CD0:ENV
  34.   EndIF
  35.  
  36.   IF NOT EXISTS CD0:Prefs/Env-Archive
  37.     Assign >NIL: ENVARC:         dh0:CDROM
  38.   ELSE
  39.     Assign >NIL: ENVARC:         CD0:Prefs/Env-Archive
  40.     Assign >NIL: ENVARC:         dh0:CDROM ADD
  41.   EndIF
  42.  
  43.   Assign >NIL: SYS:            CD0:
  44.   Assign >NIL: SYS:            dh0: ADD
  45.  
  46.   IF EXISTS CD0:C
  47.     Assign >NIL: C:              CD0:C
  48.   EndIF
  49.  
  50.   IF EXISTS CD0:S
  51.     Assign >NIL: S:              CD0:S
  52.   EndIF
  53.  
  54.   IF EXISTS CD0:Libs
  55.     Assign >NIL: LIBS:           CD0:Libs
  56.   EndIF
  57.  
  58.   IF EXISTS CD0:Devs
  59.     Assign >NIL: DEVS:           CD0:Devs
  60.   EndIF
  61.  
  62.   IF EXISTS CD0:Fonts
  63.     Assign >NIL: FONTS:          CD0:Fonts
  64.   EndIF
  65.  
  66.   IF EXISTS CD0:L
  67.     Assign >NIL: L:              CD0:L
  68.   EndIF
  69.  
  70.    assign >NIL: LIBS: dh0:libs ADD
  71.    assign >NIL: fonts: dh0:fonts add
  72.  
  73.    resident c:assign remove
  74.  
  75.    if exists s:startup-sequence
  76.       execute s:startup-sequence
  77.    else
  78.       if exists startup-sequence
  79.          execute startup-sequence
  80.       else
  81.          echo "No 'startup-sequence' on CD0:"
  82.          execute s:startup-sequence
  83.       endif
  84.    endif
  85. endif
  86.  
  87.  
  88.  
  89.